; double areaCirculo(float r);

global areaCirculo

%define a [ebp + 8]

section .text

areaCirculo:
	push ebp
	mov ebp, esp
	push esi
	push edi
	push ebx
	
	finit
	fld dword a ; [a]
	fld st0 ; [a|a]
	fldpi ; [pi|a|a]
	fmulp st1, st0 ; [pi * a|a]
	fmulp st1, st0 ; [pi * a * a]
	
fin:
	pop ebx
	pop edi
	pop esi
	pop ebp
	ret
